﻿Public Class _default2
    Inherits System.Web.UI.Page

    Protected Sub Page_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load

        Dim data As New List(Of Data)
        data.Add(New Data(1, "aaaa"))
        data.Add(New Data(1, "aaaa"))
        data.Add(New Data(1, "aaaa"))
        data.Add(New Data(1, "aaaa"))
        data.Add(New Data(1, "aaaa"))
        data.Add(New Data(1, "aaaa"))
        data.Add(New Data(1, "aaaa"))
        data.Add(New Data(1, "aaaa"))
        data.Add(New Data(1, "aaaa"))
        data.Add(New Data(1, "aaaa"))
        data.Add(New Data(1, "aaaa"))
        data.Add(New Data(1, "aaaa"))
        data.Add(New Data(1, "aaaa"))
        data.Add(New Data(1, "aaaa"))
        data.Add(New Data(1, "aaaa"))
        data.Add(New Data(1, "aaaa"))
        data.Add(New Data(1, "aaaa"))
        data.Add(New Data(1, "aaaa"))
        data.Add(New Data(1, "aaaa"))
        data.Add(New Data(1, "aaaa"))
        data.Add(New Data(1, "aaaa"))
        data.Add(New Data(1, "aaaa"))
        data.Add(New Data(1, "aaaa"))
        data.Add(New Data(1, "aaaa"))
        data.Add(New Data(1, "aaaa"))
        data.Add(New Data(1, "aaaa"))
        data.Add(New Data(1, "aaaa"))
        data.Add(New Data(1, "aaaa"))
        ListView1.DataSource = data
        ListView1.DataBind()
    End Sub

End Class
Class data
    Sub New(xId As Integer, xName As String)
        _name = xName
        _ID = xId

    End Sub
    Private _ID As Integer
    Public Property ID() As Integer
        Get
            Return _ID
        End Get
        Set(ByVal value As Integer)
            _ID = value
        End Set
    End Property
    Private _name As String
    Public Property Name() As String
        Get
            Return _name
        End Get
        Set(ByVal value As String)
            _name = value
        End Set
    End Property


End Class